var a,b: TOpenCLVector;
begin
clMtxVec.CreateIt(a,b);
try
b.CopyFromArray(TSingleArray.Create(0,0,0,0,1,2,3,4,5,6));
a.DownSample(b,2); // a = [0,0,1,3,5]finally
clMtxVec.FreeIt(a,b);
end;
end;
Copyright (c) 1999-2024 by Dew Research. All rights reserved.
